Old Testament Foundatiosn with Philip Yancey/Old Testament Foundatiosn with Philip Yancey - Disc 2.iso/pc/data/notes.dir/00037.ls

Text File | 1996-09-09 | 669 b | 19 lines

on exitFrame
  global gOnIBM, gHelpSaveWindow
  if gOnIBM then
    if objectp(gHelpSaveWindow) then
      forget(gHelpSaveWindow)
    end if
    set horzOrigin to the stageLeft + 25
    set vertOrigin to the stageTop + 210
    set myNotesWindowRect to rect(horzOrigin, vertOrigin, horzOrigin + 240, vertOrigin + 100)
    set gHelpSaveWindow to window "helpSaveMovie"
    set the rect of gHelpSaveWindow to myNotesWindowRect
    set the fileName of gHelpSaveWindow to "helpsave.dir"
    set the windowType of gHelpSaveWindow to 2
    set the titleVisible of gHelpSaveWindow to 1
    set the title of gHelpSaveWindow to "Save Help"
    open(gHelpSaveWindow)
  end if
end